﻿Imports System.Runtime
Imports System.Runtime.InteropServices
Imports sl3d.core

Namespace sl3exceptions
	''' <summary>
	''' needs coding
	''' </summary>
	''' <remarks></remarks>
	<Serializable()> _
	Friend NotInheritable Class InstancePlayLimitException
		Inherits ExternalException
		Public Sub New()
			MyBase.New()
		End Sub
		Public Sub New(ByVal msg As String)
			MyBase.New(msg)
		End Sub
		Public Sub New(ByVal msg As String, ByVal inner As Exception)
			MyBase.New(msg, inner)
		End Sub
	End Class
	''' <summary>
	''' needs coding
	''' </summary>
	''' <remarks></remarks>
	<Serializable(), ComVisible(False)> _
	 Public Class WaitHandleCannotBeOpenedException

		Inherits ApplicationException

		Public Sub New()
			MyBase.New("No handle of the given name exists")
			MyBase.HResult = -2146233044
		End Sub

		Public Sub New(ByVal msg As String)
			MyBase.New(msg)
			MyBase.HResult = -2146233044
		End Sub

		Public Sub New(ByVal msg As String, ByVal innerException As Exception)
			MyBase.New(msg, innerException)
			MyBase.HResult = -2146233044
		End Sub
	End Class
	''' <summary>
	''' needs coding
	''' </summary>
	''' <remarks></remarks>
	<Serializable(), ComVisible(True)> _
	Public Class ApplicationException
		Inherits Exception

		Public Sub New()
			MyBase.New("Error in the Application")
			MyBase.HResult = -2146232832
		End Sub
		Public Sub New(ByVal msg As String)
			MyBase.New(msg)
			MyBase.HResult = -2146232832
		End Sub
		Public Sub New(ByVal msg As String, ByVal innerException As Exception)
			MyBase.New(msg, innerException)
			MyBase.HResult = -2146232832
		End Sub
	End Class
	''' <summary>
	''' needs coding
	''' </summary>
	''' <remarks></remarks>
	<Serializable()> _
	Public Class GamerServicesNotAvailableException
		Inherits Exception
		Public Sub New()
			MyBase.new()
		End Sub

		Public Sub New(ByVal msg As String)
			MyBase.new(msg)
		End Sub
		Public Sub New(ByVal msg As String, ByVal innerException As Exception)
			MyBase.new(msg, innerException)
		End Sub
	End Class
	''' <summary>
	''' needs coding
	''' </summary>
	''' <remarks></remarks>
	Public Class NoSuitableGraphicsDeviceException

	End Class

End Namespace